\def\fileversion{1.0a} \def\filedate{89/05/10} \def\docdate{89/05/17} \iffalse % Style-option `underlin' to use with LaTeX v2.09 % Copyright (C) 1987, 1989 Rainer Schoepf, all rights reserved. % Copying of this file is authorized only if either % (1) you make absolutely no changes to your copy, including name, or % (2) if you do make changes, you name it something other than % underlin.sty. % This restriction helps ensure that all styles developed at Mainz % are identical. % Please send bug reports to: % R.~Sch\"opf % Institut f\"ur Physik % JoGu Universit"at % D-6500 Mainz % Federal Republic of Germany % Bitnet: % \title{Two {\sf pagestyles} for underlining headers\thanks{This file % has version number \fileversion, last % revised \filedate, documentation dated \docdate.}} % \author{Rainer Sch\"opf \\ % Institut f\"ur Physik \\ % Johannes Gutenberg Universit\"at Mainz} % \date{\quad} % \maketitle % \begin{abstract} % This style option implements two new {\sf pagestyles} % {\tt underline} and {\tt myunderline} that are similar % to the standard {\tt headings} and {\tt myheadings} % {\sf pagestyles} but provide a horizontal line just below % the head line. % \end{abstract} % The purpose of this style option file is to provide a way to % underline a running head. % This is done by redefining the \verb+\@evenhead+ and \verb+\@oddhead+ % macros. % To understand this you must know that whenever a given pagestyle % (say `xxx') is selected by a \verb+\pagestyle{xxx}+ command the % macro \verb+\ps@xxx+ is executed. % Therefore we define a macro \verb+\ps@underline+ which is called % when you say \verb+\pagestyle{underline}+. % To provide for a rule with user-defined headings we also define % the pagestyle `myunderline' , i.e.\ the macro \verb+\ps@myunderline+. % \StopEventually{} % As always we begin by identifying the latest version of this file % on the VDU an in the transcript file. % \begin{macrocode} \typeout{Style-Option: `underline' \fileversion \space <\filedate> (RmS)} \typeout{Documentation dated \@spaces \@spaces \space\space\space <\docdate> (RmS)} % \end{macrocode} % \begin{macro}{\ps@underline} % The first thing the macro \verb+\ps@underline+ % does is to call % \verb+\ps@headings+ to set up everything like the `headings' % pagestyle does. % Here we do not need to distinguish onesided and twosided % printing since this is already done correctly by % \verb+\ps@headings+. % \begin{macrocode} \def\ps@underline{\ps@headings % \end{macrocode} % Then we redefine \verb+\@evenhead+. The first part is a copy of % the definition in \verb+\ps@headings+. % This has the advantage that this style option works with % document styles `article', `report', and `book'. % \begin{macrocode} \def\@evenhead{\rm \thepage\hfil \sl\leftmark\null % \end{macrocode} % Additionally we include a \verb+\vadjust+ primitive. The effect of % this primitive is to add its argument after the current % \verb+\hbox+ to the enclosing vertical list. % \begin{macrocode} \vadjust{\vskip .3ex\hrule}}% % \end{macrocode} % The \verb+\@oddhead+ macro is constructed % analogously.\footnote{{\tt\bslash null} is defined to be % {\tt\bslash hbox\char`\{\char`\}} in % {\tt lplain.tex}.} % \begin{macrocode} \def\@oddhead{\null\sl \rightmark \hfil \rm\thepage \vadjust{\vskip .3ex\hrule}}} % \end{macrocode} % \end{macro} % \begin{macro}{\ps@myunderline} % The macro \verb+\ps@myunderline+ for underlining user defined % running heads is constructed analogously. % \begin{macrocode} \def\ps@myunderline{\ps@myheadings \def\@oddhead{\null\sl \rightmark \hfil \rm\thepage\vadjust{\vskip .3ex\hrule}}% \def\@evenhead{\rm\thepage\hfil\sl \leftmark \null \vadjust{\vskip .3ex\hrule}}} % \end{macrocode} % \end{macro} % Remarks, comments, complaints, etc. should be sent to: \\[3mm] % Rainer Sch\"opf \\ % Institut f\"ur Physik \\ % Universit\"at Mainz \\ % Staudinger Weg 7 \\ % D-6500 Mainz \\ % West Germany \\ % \tt % \Finale \endinput Upper-case ABCDEFGHIJKLMNOPQRSTUVWXYZ Lower-case abcdefghijklmnopqrstuvwxyz Digits 0123456789 Exclamation ! Double quote " Hash (number) # Dollar $ Percent % Ampersand & Acute accent ' Left paren ( Right paren ) Asterisk * Plus + Comma , Minus - Point . Solidus / Colon : Semicolon ; Less than < Equals = Greater than > Question mark ? Commercial at @ Left bracket [ Backslash \ Right bracket ] Circumflex ^ Underscore _ Grave accent ` Left brace { Vertical bar | Right brace } Tilde ~